ZADÁNÍ: Rozvineme-li plášť rotačního kužele, jehož obsah je S, do 
 	roviny, dostaneme kruhovou výseč se středovým úhlem alfa. 
 	Vypočítejte obejm kužele. 

1. Sestrojíme si kruhovou výseč o obsahu S se středovým úhlem alfa.
Její poloměr s je roven sqrt(2*S/alfa).

2. Poloměr podstavy r daného kužele získáme z délky kruhového oblouku výseče.
Tato délka odpovídá oblodu podstavy a proto r = s*alfa/(2*π)

3. Jelikož hrana kužele odpovídající s, poloměr podstavy kužele r a výška kužele v tvoří pravoúhlý trojúhelník,
můžeme výšku určit pomočí pythagorovy věty jako v = odmocnina(s^2-r^2). Nyní máme všechny parametry potřebné k sestrojení 
kužele a určení jeho objemu.

Bod 3.

Bod 2

Bod 1.

Zadání

A = (-3.0876361687633516, 1.1777644431516876, 1.7763568394002505E-15)
B = (-5.8, 2.26)
alfa = 2.15 (slider from 0.05 to 6.28, step 0.05)
A' = Rotate(A, alfa, B)
α = Angle(A, B, A', xOyPlane)
S = CircleSector(B, A, A', xOyPlane)
s = Segment(A, B)
r: (s * alfa / ((2 * π)))
v: (s^(2) - r^(2))^(1 / 2)
C = (1.4182438824517654, 1.0991435472853475, 0)
D = PointIn(Sphere[C, v])
f = Segment(C, D)
V, d, b = Cone(C, D, r)
a = true
c = true
e = true
g = true